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FOREWORD 

This  report  covers  work  carried  out  by  the  author  during  her  cooper¬ 
ative  work  quarters  in  the  Turbine  Engine  Division  of  the  Aero  Propulsion 
Laboratory,  Air  Force  Wright  Aeronautical  Laborator ies ,  Wright-Pat terson 
Air  Force  Base,  Ohio.  The  objective  of  this  effort  was  to  obtain  Cal  comp 
plots  from  a  computer  program  suitable  for  direct  substitution  into  papers 
for  publication. 

This  report  supersedes  AFAPL-TR-78-90  dated  November  1978.  By  adding 
additional  overlays,  the  computer  program  has  been  modified  to  reduce  the 
computer  storage  space  required,  thus  allowing  the  use  of  a  job  number  with 
a  field  length  of  60,000  octal.  When  reviewing  the  data,  the  option  to  add 
or  delete  data  points  with  an  automatic  reordering  overlay  has  been  added. 
These  changes  have  altered  SECTION  III  -  PROGRAM  USAGE  by  changing  the 
the  question  numbering,  and  APPENDIX  B  -  PROGRAM  LISTING  by  including  the 
added  overlays.  SECTION  II  and  the  examples  in  APPENDIX  D  have  also  been 
updated  to  include  these  changes. 

The  author  wishes  to  express  her  appreciation  to  the  following  indi¬ 
viduals  for  their  support  in  supplying  information  for  this  program. 

Dr.  James  MacBain,  Doretta  Holland,  and  Richard  Hill. 
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SECTION  I 
INTRODUCTION 

GRAPH  is  a  plotting  program  which  has  been  written  to  aid  the 
engineer  in  plotting  analytical  data.  It  was  programed  according  to 
the  format  requirements  of  a  CDC6600  via  a  TEKTRONIX  4010  on-line 
computer  terminal.  It  has  been  generated  from  a  pre-packaged  set  of 
subroutines  entitled  Display  Integrated  Software  System  and  Plotting 
LAnguage  (DISSPLA)  (Reference  1),  utilizing  only  a  small  portion  of 
the  subroutines  offered. 

GRAPH  has  been  set  up  with  a  series  of  overlays  (Reference  2), 
each  of  which  is  used  for  various  general  curve  options  or  for  a 
specific  style  curve.  The  TEK4010  is  limited  to  programs  with  100,000 
octal  or  less;  therefore  overlays  were  used  where  possible  to  limit 
the  core  requirements  of  GRAPH. 

The  subroutines  of  DISSPLA  must  be  called  at  the  proper  levels 
and  several  of  these  must  remain  resident  in  memory.  If  these  sub¬ 
routines  of  DISSPLA  appeared  in  overlays  that  may  have  been  by-passed, 
it  would  cause  a  fatal  programing  error.  A  brief  description  of  each 
subroutine  used  from  DISSPLA  can  be  found  in  APPENDIX  C. 

A  flow  chart  of  the  computer  program  is  given  in  APPENDIX  A, 
followed  by  the  computer  listing  in  APPENDIX  B.  A  complete  example 
of  each  style  curve  and  curve  option  is  given  in  APPENDIX  D. 

The  program  offers  unique  characteristics  that  allow  the  plots 
to  be  suitable  for  use  in  a  paper  for  publication  without  having  to 
be  redrawn  by  an  artist. 
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The  following  list  contains  all  the  capabilities  and  options  of 
the  program. 

Style 

Upper  and  Lower  Case  Letters 

English  or  Greek  Alphabets 

Subscript  and  Superscript  Numbering 

Plain  or  Bold  Face  Letters 

Plot  Heading 

Axes  Labeling 

Curve  Labeling  (Legend) 

Output 

Maximum  of  5  Curves 
Axes  Scaling 
Linear  Plotting 
Logarithmic  Plotting 
Semi-Logarithmic  Plotting 
Least-Squares  Fit  to  the  6th  Order 
Smooth  Curve  Fitting 
Straight  Line  Between  Points 
Plotting  of  Data  Points  Only 
Cal-Comp  Replication 

For  further  information  or  copies  of  the  program,  contact  AFWAL/POTC. 
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SECTION  II 

GRAPH-PROGRAM  DESCRIPTION 

To  develop  a  better  understanding  of  the  format  used  in  setting  up 
GRAPH,  each  author  written  overlay  and  subroutine  is  described  as  to  its 
specific  option.  A  description  of  each  DISSPLA  subroutine  can  be  found 
in  APPENDIX  C. 

The  main  overlay,  PROGRAM  PLTD,  is  the  body  of  the  program.  Common 
blocks  are  used  for  communication  between  the  main  overlay  and  the  other 
overlays  and  subroutines.  Logic  statements  within  the  main  overlay  are 
used  to  call  or  by-pass  the  primary  and  secondary  overlavs  as  they  are 
needed  for  style  and  output  of  the  plot.  Actual  plotting  is  done  from 
the  main  overlay  by  use  of  a  System  Subroutine,  CCALL,  which  inputs  the 
proper  control  cards  without  having  to  terminate  the  program. 

SUBROUTINE  NEWPAGE  is  used  to  call  the  necessary  subroutines  from 
the  Tektronix  Library  that  are  used  to  reset  the  page  after  several  ques¬ 
tions  have  appeared  on  the  screen. 

PROGRAM  ALPHA,  Overlay  (1,0),  allows  the  use  of  special  alphabets. 
These  include  upper  and  lower  case  Greek,  lower  case  standard,  and  the 
use  of  superscripts  or  subscripts.  These  alphabets  require  the  use  of 
special  characters  designated  by  the  DISSPLA  subroutine,  MXiALF. 

PROGRAM  LABSZE,  Overlay  (2,0),  is  called  to  input  the  Axes  charac¬ 
teristics,  the  Title,  which  has  a  maximum  of  45  characters,  the  X  and  Y 
Labels,  which  have  a  maximum  of  59  characters  each,  the  X  axis  length, 
maximum  of  8.5  inches,  and  Y  axis  length,  maximum  of  9.5  inches.  The 
labels  will  be  centered  according  to  the  axes  lengths  by  using  a  $  (dollar 
sign)  as  the  last  character,  and  setting  the  number  of  characters  equal 
to  100  in  DISSPLA  subroutine  TITLE.  This  is  a  self  counting  option  of 
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DISSPLA.  The  $  is  input  by  PROGRAM  LABSZE  for  user  convenience* 

PROGRAM  LIN,  Overlay  (3,0),  is  called  when  a  linear  plot  is  chosen. 

The  minimum  and  maximum  X  and  Y  data  values  must  be  input.  These  values 
are  used  in  determining  the  axes  intervals  by  use  of  a  self  scaling  rou¬ 
tine,  SCALE,  if  the  user  opts  not  to  input  the  interval  size.  The  option 
to  divide  these  intervals  into  subdivisions  also  exists. 

PROGRAM  LOG,  Overlay  (4,0),  is  called  when  a  log  plot  is  chosen. 

Input  necessary  for  this  overlay  includes  the  minimum  X  and  Y  values  greater 
than  zero,  and  the  X  and  Y  log  cycle  lengths  in  inches  per  cycle. 

PROGRAM  SEMI,  Overlay  (5,0),  is  used  to  call  either  Overlay  (5,1), 
used  for  X  Semilogarithmic  plotting,  of  Overlay  (5,2),  used  for  Y  Semi- 
logarithmic  plotting. 

PROGRAM  XSML,  Overlay  (5,1),  is  called  for  Semilogarithmic  type  axes. 
The  semilogarithmic  data  necessary  includes  the  minimum  X  value  greater 
than  zero,  the  minimum  Y  value,  and  the  X  log  cycle  length  in  inches  per 
cycle.  The  self  scaling  option  is  not  available  for  nonlinear  plotting, 
therefore  the  Y  step  size  must  be  input.  The  Y  axis  can  be  divided  into 
subdivisions  by  inputing  the  number  of  minor  ticks  per  Y  division. 

PROGRAM  YSML,  Overlay  (5,2),  is  called  for  Y  Semilogarithmic  type 
axes.  Necessary  data  follows  the  same  format  as  for  PROGRAM  XSML  inter¬ 
changing  X  for  Y  and  Y  for  X. 

PROGRAM  LSF,  Overlay  (6,0),  is  called  when  a  least  squares  curve  fit 
is  desired.  Curve  fitting  up  to  the  sixth  degree  can  be  requested.  System 
Subroutine  PLSCF  is  called  to  calculate  the  least  square  coefficients. 

These  values  can  then  be  reviewed.  The  coefficients  are  used  to  calculate 
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the  new  Y  array  of  values.  The  adjusted  data  that  is  to  be  plotted  can 
then  be  reviewed,  but  not  changed. 

PROGRAM  DAT,  Overlay  (7,0),  is  for  input  of  data  pairs  for  the  curvi- 
and  correction  of  the  data.  There  is  a  limit  of  30  pairs  per  curve.  Data 
can  be  input  in  any  format,  with  X  in  ascending  order,  and  alternating 
X,  Y  values,  (Xl ,Y1 , X2 ,Y2 .  The  /  (slash  symbol)  must  appear  at  the 
end  of  a  string  of  data  pairs  to  signal  to  the  computer  that  you  are 
finished  with  your  input.  The  user  has  the  option  to  review  the  data  and 
if  any  are  incorrect,  to  add,  delete  or  change,  from  one  to  all  of  the 
data  pairs.  If  only  a  few  pairs  need  be  corrected,  the  data  point  number 
must  be  input,  then  the  corrections  are  made  one  at  a  time.  If  more  than 
half  the  data  need  be  corrected,  all  of  the  data  must  be  retyped.  This 
was  done  because  of  limited  storage  space.  The  data  can  be  reviewed  after 
the  corrections  have  been  input  to  make  sure  all  pairs  are  now  correct. 
Corrections  can  be  made  until  all  of  the  data  is  correct. 

PROGRAM  REORDER,  Overlay  (7,1),  is  called  when  corrections  are  made 
to  the  data.  Itfs  function  is  to  reorder  the  data,  if  necessary,  so  that 
X  is  in  ascending  order. 

PROGRAM  ONE,  Overlay  (10,0),  contains  two  DISSPLA  subroutines.  These 
subroutines  are  used  to  set  the  page  size  and  to  remove  the  frame  type 
border.  Because  these  subroutines  are  not  referenced  by  any  other  DISSPLA 
subroutines,  they  do  not  need  to  be  in  memory  at  all  times.  These  subrou¬ 
tines  were  called  within  an  overlay  to  reduce  the  continuous  memory  needed 
by  the  main  overlay. 

PROGRAM  SYMB,  Overlay  (11,0),  is  used  to  determine  the  appearance  of 
the  curve.  In  DISSPLA  there  are  14  symbols,  with  integers  1-14  corres¬ 
ponding  to  a  different  symbol.  If  symbols  are  desired,  an  integer  value 
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mast  be  typed  in.  This  overlay  is  also  used  to  determine  whether  the 
data  points  are  connected  by  a  smooth  curve,  a  straight  line,  or  least 
squares  curve  fitting.  The  option  for  no  curve  fitting,  only  symboled 
data  points,  also  exists. 

PROGRAM  LEGG,  Overlay  (12,0),  is  called  only  when  a  symbol  is  used 
on  a  curve.  It  is  called  after  each  symbol  is  designated  to  input  the 
message  for  that  curve.  The  message  can  have  a  maximum  of  39  characters 
but  should  be  limited  to  avoid  overwriting  the  curve. 

PROGRAM  LEGED,  Overlay  (13,0),  is  used  to  input  the  position  of 
the  legend  on  the  plot.  Dimensions  are  in  inches  from  the  physical 
origin  of  the  plot. 
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SECTION  III 
GRAPH  -  PROGRAM  USAGE 

Each  question  is  listed  below  in  the  order  of  appearance  on  the  Tektronix 
4010  screen.  The  TEK401Q  unit  was  used  because  of  its  advantage  of  inter¬ 
acting  with  the  computer  program  while  it  is  executing  on  the  CDC6600 
computer.  Data  can  be  input  and  corrected  by  a  series  of  questions.  Many 
of  the  questions  can  be  answered  by  a  Y  for  YES  or  an  N  for  NO.  Questions 
requiring  numerical  answers  have  either  (F.P.),  FLOATING  POINTS,  or  (I), 
INTEGER,  following  them  indicating  which  kind  of  value  is  required.  Possible 
answers  to  loops  are  in  brackets  with  each  set  of  questions  shown.  To  LOGIN, 
the  user  must  use  a  job  number  with  a  field  length  of  100,000.  The  program 
must  then  be  attached. 

COMMAND  -  ATTACH,  CARD,  GRAPH,  CY=1,  ID-P710627,  SN=AFAPL. 

COMMAND  -  CARD. 

1.  INPUT  DATA  FOR  NEW  CURVE  (Y  OR  N) ? 

If  the  answer  is  affirmative,  program  continues,  creating  a  plot  file. 

If  the  answer  is  negative,  see  question  16. 

2.  DO  YOU  WANT  STANDARD  OR  BOLD  TYPE?  INPUT  S  OR  B  - 

This  decides  which  style  of  writing  is  to  be  used  on  the  plot, 
f S ]  Default  style  of  writing.  It  has  limited  characters  and  is  a 
much  faster  style.  See  Example  1  Appendix  D. 

[B]  Small  complex  style  of  writing.  It  is  suitable  for  publication 
and  takes  more  space  per  letter.  See  Example  2  Appendix  D. 

3.  ARE  YOU  USING  THE  SPECIAL  ALPHABETS  (Y  OR  N) ? 

An  affirmative  answer  will  signal  the  subroutines  for  the  escape 
characters.  This  list  can  be  found  in  Example  1  in  Appendix  D. 
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4.  INPUT  HEADING  (MAX  49  CHARACTERS)  - 

Type  in  any  let  ter /number  combination  with  the  option  of  the  lettering 
scheme,  that  has  a  maximum  of  49  characters  for  standard  lettering  and 
42  for  bold  lettering.  The  heading  will  be  centered  with  respect  to 
the  X-axis  length. 

5.  LABEL  FOR  X-AXIS  (MAX  59  CHARACTERS)  - 

Type  in  the  label  using  the  same  format  as  for  the  heading  with  a 
maximum  of  59  characters. 

6.  LABEL  FOR  Y-AXIS  (MAX  59  CHARACTERS)  - 

This,  too,  has  the  same  format  as  the  heading  and  X  label  with  a 
maximum  of  59  characters. 

7.  INPUT  X-AXIS  LENGTH  (MAX. =8. 5  INS)  (F.P.)  - 

Input  horizontal  axis  length. 

8.  INPUT  Y-AXIS  LENGTH  (MAX. =9. 5  INS)  (F.P.)  - 

Input  vertical  axis  length. 

9.  IS  THIS  A  LINEAR,  LOG,  OR  SEMILOG  PLOT? 

INPUT  LIN,  LOG,  OR  SML  - 

Program  will  continue  with  either  linear,  logarithmic  or  semilog 
type  data  questions. 

[LIN] 

9.1.1  INPUT  X  MIN  AND  X  MAX  VALUE  (F.P.,  F.P.)  - 

9.1.2  INPUT  Y  MIN  AND  Y  MAX  VALUE  (F.P.,  F.P.)- 

These  values  for  both  X  and  Y  should  be  the  extreme 
values  taken  from  the  entire  range  of  data.  They  are 
used  to  compute  the  axis  intervals. 

9.1.3A  INPUT  X  STEP  SIZE  (Y  OR  N)? 

[N]  A  negative  answer  will  signal  a  self-scaling  feature 
"SCALE"  from  DISSPLA.  Step  intervals  will  be  scaled 
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with  respect  to  the  axis  length  and  the  axis  limits, 
interpolating  the  given  limits  to  make  reasonable  step 
intervals.  For  example,  if  axis  length  is  4  ins.  and 
the  min.  and  max.  values  are  0.12  and  1.81,  axis  numbering 
will  start  at  0.  and  end  at  4.  and  the  step  interval 
will  be  one  unit  per  inch. 

m 

9.1.3B  STEP  SIZF  (UNITS/DIV)  (F.P.)  = 

Input  the  step  interval  in  units  to  divide  the  axis 
into  equal  divisions.  DISSPLA  will  use  the  min  and 
max  values  as  given  without  interpolating.  For  example, 
if  axis  length  is  6  ins.  and  the  min  and  max  values  are 
0.,  80.,  a  [10]  would  put  ten  units  every  .75  inch. 

9.1.4A  INPUT  Y  STEP  SIZE  (Y  OR  N)? 

Whether  X  is  self-scaled  or  input,  Y  can  be  self-scaled 
by  a  negative  response  or  input  by  an  affirmative 
response. 

m 

9.1.4B  Y  STEP  SIZE  (UNITS/DIV)  (F.P.)  = 

Same  format  as  for  X. 

9.1.5  INPUT  THE  NO.  OF  MINOR  TICKS  PER  X  DIV  (I)  - 

To  divide  each  interval  into  subsections,  type  in  an 
integer  value.  The  integer  typed  in  should  be  one  more 
than  desired,  i.e.,  to  show  three  minor  ticks,  type  in 
4;  thus  dividing  the  section  into  fourths,  (keeping  in 
mind  that  a  major  tick  mark  is  always  placed  at  each 
division  mark,  this  being  one  of  the  4  when  using  the 
minor  tick  option).  If  only  the  major  tick  is  desired  ,  type  0. 
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9.1.6  INPUT  THE  NO.  OF  MINOR  TICKS  PER  Y  DIV  (I)  - 
Same  format  as  for  X. 

[LOG] 

9.2.1  INPUT  THE  MIN  X  AND  Y  VALUES  >  0.  (F.P..F.P.)  - 

9.2.2  INPUT  X  AND  Y  LOG  CYCLE  LENGTHS  4  0. 

(INS/CYCLE)  (F.P..F.P.)  - 

Input  the  length  of  the  log  cycle  in  inches,  i.e., 
if  axis  length  is  six  inches  and  log  cycle  length 
is  2  inches,  3  log  cycles  will  be  drawn. 

[SML] 

9.3  IS  PLOT  LOG  IN  X  OR  LOG  IN  Y?  INPUT  X  OR  Y  - 

[X]  axis  will  have  log  scaling  and  Y  axis  linear  scaling. 

9.3. 1A  INPUT  THE  MIN  X  VALUE  >0.  (F.P.)  - 

9. 3. IB  INPUT  THE  MIN  Y  VALUE  (F.P.)  - 

9.3. 1C  INPUT  X  LOG  CYCLE  LENGTH  4  0.  (INS /CYCLE)  (F.P.)  - 

Type  in  plot  characteristics. 

9.3. ID  INPUT  Y  STEP  SIZE  (UNITS/INCH)  (F.P.)  - 

The  self-scaling  feature  is  not  available  for  semilog 
type  plotting.  Step  intervals  will  be  placed  every  inch 
9. 3. IE  INPUT  THE  NO.  OF  MINOR  TICKS  PER  Y  DIV  (I)  - 
Same  format  as  for  LIN  type  plot. 

[Y]  axis  will  have  log  scaling  and  X  axis  linear  scaling. 

9.3.2A  INPUT  THE  MIN  X  VALUE  (F.P.)  - 

9.3.2B  INPUT  THE  MIN  Y  VALUE  >  0.  (F.P.)  - 

9.3.2C  INPUT  Y  LOG  CYCLE  LENGTH  4  0.  (INS/CYCLE)  (F.P.)  - 
9. 3. 2D  INPUT  X  STEP  SIZE  (UNITS/INCH)  (F.P.)  - 
9.3.2E  INPUT  THE  NO.  OF  MINOR  TICKS  PER  X  DIV  (I)  - 
Type  in  plot  characteristics. 
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10.  HOW  MANY  CURVES  PER  PLOT  (MAX=5)  (I)? 

11.  INPUT  DATA  FOR  CURVE  #1  (X1,Y1,X2,Y2, . . .  END  WITH  /)  - 

Up  to  30  pairs  of  data  can  be  input  in  any  format.  All  of  the 
data  must  be  typed  in  for  the  first  curve.  For  multipLe  curves, 
constant  X  or  Y  values  can  be  omitted  by  leaving  a  space  separ¬ 
ated  by  a  comma. 

12.  REVIEW  DATA  (Y  OR  N) ? 

An  affirmative  answer  will  print  out  three  columns  of  data  in 
12,  2F15.5  format. 

1=  X=  Y= 

12.1  IS  DATA  ACCEPTABLE  (Y  OR  N) ? 

[N] 

12.2  DO  YOU  WISH  TO  DELETE,  ADD,  OR  CHANGE  POINTS  (D,  A,  OR  C) ? 

Data  points  can  be  deleted  or  added  to  change  the  total 
number  of  points.  Each  point  can  be  changed  if  input 
incorrectly.  OVERLAY  REORDER  will  be  called  to  insure 
that  X  is  in  ascending  order. 

[C] 

12.2.1A  HOW  MANY  DATA  POINT(S)  CHANGES  (I)? 

Input  the  number  of  pairs  to  be  changed.  If  the 
number  of  pairs  is  greater  than  half  the  total 
number,  all  of  the  data  must  be  retyped. 

12. 2. IB  INPUT  DATA  POINT  NUMBER(S)  CD- 

Input  the  I  value  for  each  pair  that  needs  to  be 
changed . 
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12. 2. 1C  INPUT  DATA  POINT  CHANGE  (X,Y)- 
1  =  //  X,  Y= 

A  do  loop  is  created  allowing  you  to  type  in  the 
correct  X  and  Y  value  for  each  corresponding 
I  value. 

[D] 

12.2.2A  HOW  MANY  POINTS  TO  BE  DELETED  (MAX-#)? 

Input  the  number  of  data  points  to  be  deleted 
from  the  array  up  to  the  total  number  minus  one. 
12.2.2B  WHICH  POINTS  DELETED  (IN  ASCENDING  ORDER)? 

Only  the  integer  value  of  the  data  point  need  be 
input  to  delete  it  from  the  array. 

[A] 

12. 2. 3 A  HOW  MANY  POINTS  TO  ADD  (MAX=#)? 

Input  the  number  of  data  points  to  be  added  up 
to  30  minus  the  total  number  previously  input. 
12.2.3B  INPUT  NEW  POINT(S)  (XI,  VI,  X2,  Y2,...)- 

Input  data  pairs  in  the  same  manner  as  original 
input . 

12.3  REVIEW  DATA  (Y  OR  N) ? 

[Y]  The  corrected  data  will  be  printed 

12.4  IS  DATA  ACCEPTABLE  (Y  OR  N) ? 

[N]  A  negative  answer  will  allow  the  data  to  be  corrected  again. 
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13.  SYMBOLS  DRAWN  (Y  OR  N)  ? 

[N]  A  curve  will  be  drawn  with  no  symbols.  A  legend  cannot  be 
printed  unless  the  curve  has  symbols. 

[V] 

13.2  INPUT  INTEGER  VALUE  FOR  CYMBOL 

WHERE  0= SQUARE ,  1=CIRCLE,  2=TRIANGLE , 3=+ ,  AND  4=CAPX 

13.1  SMOOTH  CURVE  FIT,  LEAST  SQUARE  FIT,  STRAIGHT  LINE  BETWEEN 
POINTS  OR  DATA  POINTS  ONLY?  INPUT  SCF,  LSF ,  LBP ,  OR  DPO  - 

[SCFj  The  Subroutine  SPLINE  will  be  used  to  connect  all  of  the 

data  points  with  a  curve  that  is  as  smooth  as  possible. 

[LSF] 

13.2.1  INPUT  DEGREE  OF  LEAST  SQUARE  POLYNOMIAL  (I)  (1-6)  - 
The  subroutine  PLSCF  will  be  used  to  calculate  the 
Least  Square  coefficients,  2,  accordingly: 

Degree  =  1,  f(x)  =  Z(l)  +  Z(2)x 

=  2,  f (x)  =  Z(l)  +  Z (2)x  +  Z(3)x2 
etc . 

13.2.2  REVIEW  LEAST  SQUARE  COEFFICIENTS  (Y  OR  N)  ? 

An  affirmative  answer  will  print  out  the  coefficients 
in  F7.4  format. 

Z(I)  = 

13.2.3  REVIEW  DATA  FOR  LEAST  SQUARE  FIT  (Y  OR  N)  ? 

After  the  new  Y  values  have  been  calculated,  the 
data  can  be  printed  out  in  12,  F15.5  format. 

1=  X*  Y= 
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[LBP]  A  straight  line  will  be  drawn  between  each  data  point  connecting 
all  the  points. 

[DPO]  Only  the  symbols  at  each  data  point  will  be  drawn  with  no 
connecting  curve. 

13.3.1  DO  YOU  WANT  A  LEGEND  ? 

[Y] 

INPUT  MESSAGE  FOR  SYMBOL  #1  - 

Any  letter/number  combination  with  up  to  39  characters 
can  be  typed  in.  The  escape  characters  can  be  used. 

13.3.2  INPUT  X  AND  Y  VALUES  FOR  LOWER  LEFT  HAND  CORNER  OF  LEGEND 
(INS)  (F.P. ,F.P. )  - 

Type  in  the  location  for  the  lower  left  hand  corner  of 
the  entire  legend,  in  inches  from  the  lower  left  hand 
corner  of  the  plotting  page,  not  the  X,Y  value  of  the 
plot.  A  legend  can  only  be  printed  when  each  curve  of 
the  plot  has  a  symbol. 

[N]  According  to  previous  data,  program  will  either  ask  for 
data  for  multiple  curves  by  returning  to  question  #11 
or  continue  with  question  #15. 

14.  REVIEW  PLOT  ? 

[N]  A  negative  response  will  return  you  to  the  beginning  to  create  a 
a  new  plot  file,  purging  the  file  just  created. 
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[Y]  The  Statement: 

<<<  TYPE  IN,  DRAW  =1$  ,  FOR  DISSPLA  DIRECTIVES  >>'* 

will  appear.  This  is  a  necessary  comnand  for  DISSPLA  to 
terminate  the  plot  file  and  Tektronix  to  display  the  plot. 

User  types  in  "DRAW  =*1$"  only.  After  plotting  is  completed, 
hit  return  key  twice  and  program  will  return  to  the 
beginning . 

15.  INPUT  DATA  FOR  NEW  CURVE? 

If  you  wish  to  get  a  copy  from  the  calcomp  plotter,  respond  negatively. 
An  affirmative  answer  will  create  a  new  plot  file,  purging  the  plot 
just  viewed. 

[N] 

16.  SAVE  FOR  CALCOMP  PLOTTER  ? 

[Y]  The  message: 

<<<  TYPE  IN,  DRAW= 1  $  ,  FOR  DISSPLA  DIRECTIVES  >>> 

appears  once  again.  Type  in  "DRAW  =1$".  The  plot  has  been 
saved  with  bin  number  AK .  The  program  will  now  return  to  the 
beginning . 

[n]  Stop 

INPUT  DATA  FOR  NEW  CURVE? 

[Y]  If  more  plotting  is  to  be  done,  continue. 

[n] 

SAVE  FOR  CALCOMP  PLOTTER? 

[N]  Stop  program.  "LOGOUT." 

[Y]  A  loop  is  created,  making  a  copy  of  your  plot  then  returning  back 
to  the  beginning  of  the  program,  until  a  negative  response  is 
entered. 
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SECTION  IV 
CONCLUSION 

"GRAPH"  is  a  straight  forward  interactive  computer  program  designed 
to  establish  a  standard  format  in  plotting  analytical  data.  The  program 
provides  a  quick  and  efficient  method  of  preparing  a  finished  plot  that 
is  suitable  for  direct  substitution  into  papers  for  publication.  GRAPH 
was  programed  for  use  on  the  CDC6600  via  a  TEK4010  on-line  computer 
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APPENDIX  A 

GRAPH-PROGRAM  FLOW  CHART 
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GRAPH-  PROGRAM  LISTING 


21 


(‘>At»)i  r  ju  *anT  >ta  «<>-,%■;  .  jl  »  t  *  Pt  ?  input 


•M/**/*0  09.  Kjt 


AFAPL-TR- 78-90 


»*  l  : 


AFAPl-TR-78-90 


AFAPL-TR-78-90 


AFAPL-TR- 7  8-90 


7*Wb  03/^6/du  O'i.O'l.tZ 


AFAPL-TR- 78-90 


O'*. 09^2 


Ji/?o  /1J  04.0'*.^^ 


AFAPL-TR- 78-90 


".ALL 


AFAPL-TR-78-90 


33 


•'LL 


I  *»*  JT 


<  >  >  ,r>  i  i:>nr»  i 


AF  APL-TR- 78-90 


AFAPL-TR- 78-90 


APPENDIX  C 

DISSPLA  SUBROUTINE  DESCRIPTION 
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For  modifications,  a  brief  description  of  each  subroutine  used  from 
DISSPLA  follows  as  they  are  used  in  the  program.  If  more  information  is 
needed  see  the  DISSPLA  manual. 


COMPRS  sets  up  the  interface  between  the  TEK4010  and  DISSPLA. 

BGNPL  initializes  the  common  blocks  of  DISSPLA.  It  will  also  reset  the 
common  blocks  to  begin  a  new  plot  file. 

NOBRDR  overrides  the  default  option  of  drawing  a  rectangular  border, 
framing  the  plot. 

PAGE  is  used  to  obtain  a  page  size  other  than  8  1/2"  x  11".  In  this 
case  an  11"  x  11"  plotting  page  is  being  used  so  that  the  title  and  X 
label  will  not  be  truncated  by  DISSPLA.  Finished  plots  will  fit  on  a 
standard  8  1/2"  x  11"  page  if  the  X  axis  length  does  not  exceed  7  1/2". 

SCMPLX  will  be  called  if  the  user  asks  for  bold  writing.  This  style 
offers  characters  suitable  for  publication. 

MXiALF  is  used  to  signal  mixed  alphabets.  The  "i"  has  been  replaced 
by  an  integer  to  define  which  escape  character  is  used  for  each  alphabet. 
DISSPLA  allows  six  alphabets  to  be  used  at  one  time.  In  this  case  a 
semi  colon  ;  is  used  to  reset  type  to  standard.  A  plus  sign  +  is  used 
for  upper  case  Greek.  A  slash  /  is  used  for  lower  case  Greek.  Quotes  " 
are  used  for  upper  case  Russian.  For  a  superscript  @EH.5;  should  be 
typed  in.  For  a  subscript,  type  (?LH.5;  .  To  reset  to  standard  size  and 
level,  type  0EXHX;  or  0LXHX;  .  If  any  of  the  escape  characters  are  used 
in  a  label,  they  should  be  typed  twice. 

TITLE  is  used  to  define  the  axes  labels  and  lengths. 

CROSS  is  used  to  cause  the  axes  to  intersect  at  the  0,,0.  point  if  it 
exists.  If  it  does  not  exist,  the  axes  will  intersect  at  the  minimum 
positive  value. 

YAXANG(0.)  will  write  the  Y  axis  numbering  horizontally.  The  value  in 
parenthesis  corresponds  to  the  angle  in  degrees  from  the  horizontal  for 
which  the  Y  axis  will  be  numbered.  DISSPLA  has  a  default  angle  of  90 
degrees . 

XTICKS  will  subdivide  each  X  axis  division  in  the  amount  requested. 

YTICKS  will  subdivide  each  Y  axis  division  in  the  amount  requested. 

GRAF  is  used  to  define  the  X-Y  physical  origin,  the  X  and  Y  step  size, 
and  the  X  and  Y  maximum  value  for  linear  type  plots. 
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LOGLOG  is  used  to  define  the  X-Y  physical  origin,  and  the  X  and  Y 
log  cycle  lengths  for  log-log  type  plots. 

XLOG  is  used  to  define  the  X-Y  physical  origin,  the  X  log  cycle 
length  and  the  Y  step  size  for  semilog  type  plots. 

YLOG  is  used  to  define  the  X-Y  physical  origin,  the  Y  log  cycle 
length  and  the  X  step  size  for  semilog  type  plots. 

MARKER  uses  the  symbol  corresponding  to  the  input  integer  value  with 
a  total  of  14  different  symbols. 

LINES  is  used  to  define  the  labels  of  the  symbols  for  use  in  the  legend 
and  to  give  DISSPLA  the  workspace  it  needs  for  the  legend. 

SPLINE  interpolation  fits  third  order  polynomials  between  each  pair  of 
points  so  that  the  curve  is  continuous  everywhere. 

RESET  will  reset  any  parameter  option  to  the  default  option. 

CURVE  is  used  to  plot  each  curve  on  the  plot. 

LEGEND  puts  a  legend  on  the  plot  by  inputing  the  location  of  the 
lower  left  hand  corner. 

ENDPL  terminates  plotting  the  current  plot  file  and  reinitializes  DISSPLA. 
DONEPL  terminates  the  current  plot  file. 
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EXAMPLE  1 

Example  1  illustrates  the  use  of  the  following  options 

Standard  Type 
Linear  Plotting 
Multiple  Curves 
Symboled  Curves 
Smooth  Curve  Fit  (SCF) 

Least  Squares  Fit  (LSF) 

Straight  Line  Between  Points  (LBP) 

Data  Points  Only  (DPO) 

Legend 

Calcomp  Reproduction 


/ 
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EXAMPLE  2 

Example  2  illustrates  the  use  of  the  following  options: 
Bold  Type 

Lower  Case  Greek  Lettering 
Logarthmic  Plotting 
Smooth  Curve  Fit  (SCF) 
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EXAMPLE  3 

Example  3  illustrates  the  use  of  the  following  options 
Standard  Type 

Lower  Case  Standard  Lettering 
Superscript  Numbering 
X-Semilogarithmic  Plotting 
Smooth  Curve  Fit  (SCF) 

Calcomp  Reproduction 
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EXAMPLE  4 

Example  4  illustrates  the  use  of  the  following  options: 

Bold  Type 
Russian  Lettering 
Y-Semilogarithmic  Plotting 
Smooth  Curve  Fit  (SCF) 

Calcomp  Reproduction 
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PLOTTING  PROGRAM  FOR  DISSPLA  4  JAN  1980 
ANSWER  QUESTIONS  AS  EITHER  FLOATING  PT.  <F.P. )  UALUES  OR  AS 
INTEGER  <I>  UALUES  AS  INDICATED.  ANSWER  DEFINITIUE 
QUESTIONS  WITH  EITHER  Y  FOR  YES  OR  N  FOR  NO  . 


AFAPL-TR-78-90 


( 

i 


13 


CL 

LiJ 


CD 


UJ 

Ixl 

CL 


LU 

N 

M 

CD 


CO 


C-* 


cl 

o 

>- 

UJ 


3 

O 


Ctl 

O 


<x 

Cl 


CL 


u 

z 

UJ 


o 

o 

u 

z 


o 

a! 


CVJ 

2: 

M 

CD 

CLf- 

UJO 


&.cd 

jiCL 
(Dhh 
►H  U- 
Cl 

lx 

•  o 


0> 

CL 


UJ 

CL 


CD 


CD 


CL  Z 


3 

O 

> 


CL 

CD 

UJ 


O 

Ul 


O 


CD 

O 

H- 

l 

ss 

BE 

I— 

o»- 

I-IU 


O  Mf— 


-JUUJ 

UlOO 

UJCi^Lk; 

Smk 

5Sft 

a!  ii  n 

X 

+ 


0£Q. 
Q~ttl 
u)  CL  O  u~> 
UJQ£  CJ 
COW  CO  -O 

3cS.aSx»- 

ODDI 
WOOXCfl 
QC  LU  - 

S  11  11 
O  -CLUJ 

_ iiniouja: 

II  XIK  II 
Ixl  -J  *—« 

\  •£>  c»i  uj  - 


86 


ARE  YOU  USING  THE  SPECIAL  ALAPHABETS  <Y  OR  N>  ?Y 
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INPUT  Y-AXIS  LENGTH  < MAX=9 . 5  INS)  CF.P. ) 

JS  THIS  A  LINEAR,  LOG,  OR  SEMILOG  PLOT? 
INPUT  LIN,  LOG,  OR  SML  -SML 


IS  PLOT  LOG  IN  X  OR  LOG  IN  Y  ?  INPUT  X  OR  Y 
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